﻿Public Class FamiliaFalloAlta
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante el alta del Grupo")
        Me.codigo = Utils.Enumeradores.Excepeciones.FamiliaFalloAlta
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante el alta del Grupo"
        Me.innerException2 = innerException
    End Sub
End Class

Public Class FamiliaFalloEditar
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante la actualización del Grupo")
        Me.codigo = Utils.Enumeradores.Excepeciones.FamiliaFalloEditar
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante la actualización del Grupo"
        Me.innerException2 = innerException
    End Sub
End Class

Public Class FamiliaFalloBaja
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante la baja del Grupo")
        Me.codigo = Utils.Enumeradores.Excepeciones.FamiliaFalloEliminar
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante la baja del Grupo"
        Me.innerException2 = innerException
    End Sub
End Class

Public Class FamiliaFalloBuscar
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante la búsqueda del Grupo")
        Me.codigo = Utils.Enumeradores.Excepeciones.FamiliaFalloBuscar
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante la búsqueda del Grupo"
        Me.innerException2 = innerException
    End Sub
End Class

Public Class FamiliaFalloConsultar
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("Error durante la consulta de Grupo")
        Me.codigo = Utils.Enumeradores.Excepeciones.FamiliaFalloConsultar
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "Error durante la consulta de Grupo"
        Me.innerException2 = innerException
    End Sub
End Class
